clc
ll=0;
while ll~=4
ll=menu('Выберете плоскость ДН рупора(азимутальный угол)','XOZ(0 градусов)','YOZ(90 градусов)','45 градусов','Назад');
if ll==1 phi0=0;rupor;razmer;menu3;end
if ll==2 phi0=90;rupor;razmer;menu3;end
if ll==3 phi0=45;rupor;razmer;menu3;end
end